﻿Public Class BMI
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim height As Double
        Dim weight As Double
        Dim bmi As Double

        height = CInt(txtHeight.Text)
        weight = CInt(txtWeight.Text)

        bmi = weight / (height * height)

        lblBMI.Text = bmi



    End Sub
End Class